home *** CD-ROM | disk | FTP | other *** search
/ Amiga Format CD 7 / Amiga Format AFCD07 (Dec 1996, Issue 91).iso / serious / shareware / programming / aros / graphics / getapen.c < prev    next >
Encoding:
C/C++ Source or Header  |  1996-09-12  |  908 b   |  52 lines
  1. /*
  2.     (C) 1995 AROS - The Amiga Replacement OS
  3.     $Id: getapen.c,v 1.1 1996/08/23 17:31:26 digulla Exp $    $Log
  4.     Desc:
  5.     Lang: english
  6. */
  7. #include "graphics_intern.h"
  8.  
  9. /*****************************************************************************
  10.  
  11.     NAME */
  12.     #include <graphics/rastport.h>
  13.     #include <clib/graphics_protos.h>
  14.  
  15.     __AROS_LH1(ULONG, GetAPen,
  16.  
  17. /*  SYNOPSIS */
  18.     __AROS_LHA(struct RastPort *, rp, A0),
  19.  
  20. /*  LOCATION */
  21.     struct GfxBase *, GfxBase, 143, Graphics)
  22.  
  23. /*  FUNCTION
  24.  
  25.     INPUTS
  26.  
  27.     RESULT
  28.  
  29.     NOTES
  30.  
  31.     EXAMPLE
  32.  
  33.     BUGS
  34.  
  35.     SEE ALSO
  36.  
  37.     INTERNALS
  38.  
  39.     HISTORY
  40.     29-10-95    digulla automatically created from
  41.                 graphics_lib.fd and clib/graphics_protos.h
  42.  
  43. *****************************************************************************/
  44. {
  45.     __AROS_FUNC_INIT
  46.     __AROS_BASE_EXT_DECL(struct GfxBase *,GfxBase)
  47.  
  48.     return rp->FgPen;
  49.  
  50.     __AROS_FUNC_EXIT
  51. } /* GetAPen */
  52.